home *** CD-ROM | disk | FTP | other *** search
/ Aminet 49 / Aminet 49 (2002)(GTI - Schatztruhe)[!][Jun 2002].iso / Aminet / util / batch / MiniMen.lha / MiniMen / DMSP < prev    next >
Text File  |  2000-02-27  |  361b  |  18 lines
  1. echo c
  2. Requestfile >env:FDMS TITLE="Enter DMS file name." DRAWER "RAM:"
  3. if warn
  4.    echo "*N Operation canceled....!"
  5.    quit
  6. endif
  7. MiniMen drives
  8. if exists env:minmen
  9.    if $MinMen EQ "PC0"
  10.       dms read $FDMS from $MinMen: PC
  11.    else
  12.       dms read $FDMS from $MinMen:
  13.    endif
  14. else
  15.    echo "*N Operation canceled...!"
  16. endif
  17. delete >nil: env:MinMen env:FDMS
  18.